home *** CD-ROM | disk | FTP | other *** search
/ PCNet 1998 June / PCnet Haziran 1998.iso / Internet / Chat / oxscript.exe / System / ctcp.ini < prev    next >
Encoding:
INI File  |  1998-01-28  |  1.7 KB  |  31 lines
  1. [script]
  2. n0=on 1:text:*!ping*:#:/ctcp $nick ping
  3. n1=on 1:text:*ping*:#:/ctcp $nick ping
  4. n2=on 1:ctcpreply:ping*:{
  5. n3=  set %pt 0
  6. n4=  %pt = $ctime - $parm2
  7. n5=  notice $nick %ver  Auto Ping : tu lagues de ( $+ %pt $+ )  seconds
  8. n6=  halt
  9. n7=}
  10. n8=#floodctcp off
  11. n9=ctcp !1:*:{
  12. n10=  if ((%ctcpchan == on) && ($chan != $null))  {
  13. n11=    if (($me isop $chan) && (%textlength != $null) && ($len($1-) > %textlength)) { mode $chan -o+b $nick $wildsite | kick $chan $nick Ctcp flood , bye bye. ü %ver ü | .timer 1 45 mode $chan -b $wildsite | goto end }
  14. n12=    inc %flood.ctcp. [ $+ [ $chan [ $+  [ $nick ] ] ] ] 1
  15. n13=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  16. n14=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 4 {
  17. n15=      if $me isop $chan { mode $chan -o+b $nick $wildsite | kick $chan $nick Channel Ctcp flood, bye bye ü % ver ü | .timer 1 45 mode $chan -b $wildsite }
  18. n16=      if (($me !isop $chan) && (%ctcppriv == off)) { echo 2 -a CTCP Channel Flood! ü $+ $nick $+ ü tu es ignorer. ü %ver ü | if $1 == dcc .ignore -ntu90 $wildsite 2 | else .ignore -tu90 $wildsite }
  19. n17=      unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  20. n18=    }
  21. n19=    :end
  22. n20=  }
  23. n21=  if %ctcppriv == on {
  24. n22=    inc %flood.ctcp. [ $+ [ $wildsite ] ] 1
  25. n23=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $wildsite ] ]
  26. n24=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 4 { notice $nick CTCP Flood! tu es ignorer. ü %ver ü | unset %flood.ctcp. [ $+ [ $wildsite ] ] | if $1 == dcc .ignore -ntu90 $wildsite | else .ignore -tu90 $wildsite }
  27. n25=  }
  28. n26=  if $1 == version raw -q notice $nick :VERSION %ver %web
  29. n27=}
  30. n28=#floodctcp end
  31.